inherited crdTenantIncoming: TcrdTenantIncoming
  Left = 431
  Top = 266
  VertScrollBar.Range = 0
  BorderStyle = bsDialog
  Caption = #1044#1086#1082#1091#1084#1077#1085#1090' '#1086' '#1076#1086#1093#1086#1076#1072#1093' '#1075#1088#1072#1078#1076#1072#1085#1080#1085#1072
  ClientHeight = 169
  ClientWidth = 443
  OldCreateOrder = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 48
    Top = 38
    Width = 76
    Height = 13
    Alignment = taRightJustify
    Caption = #1058#1080#1087' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  end
  object Label2: TLabel [1]
    Left = 56
    Top = 60
    Width = 68
    Height = 13
    Alignment = taRightJustify
    Caption = #8470' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  end
  object Label3: TLabel [2]
    Left = 28
    Top = 82
    Width = 96
    Height = 13
    Alignment = taRightJustify
    Caption = #1042#1099#1076#1072#1085' '#1085#1072' '#1087#1077#1088#1080#1086#1076' '#1089
  end
  object Label4: TLabel [3]
    Left = 4
    Top = 104
    Width = 120
    Height = 13
    Alignment = taRightJustify
    Caption = #1057#1088#1077#1076#1085#1077#1084#1077#1089#1103#1095#1085#1099#1081' '#1076#1086#1093#1086#1076
  end
  object Label5: TLabel [4]
    Left = 61
    Top = 126
    Width = 63
    Height = 13
    Alignment = taRightJustify
    Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1103
  end
  object Label6: TLabel [5]
    Left = 235
    Top = 82
    Width = 12
    Height = 13
    Alignment = taCenter
    Caption = #1087#1086
  end
  inherited Panel1: TPanel
    Top = 142
    Width = 443
    inherited BitBtn1: TBitBtn
      Left = 242
    end
    inherited BitBtn2: TBitBtn
      Left = 344
    end
  end
  inherited ToolBar1: TToolBar
    Width = 443
  end
  object DBLookupComboboxEh1: TDBLookupComboboxEh [8]
    Left = 128
    Top = 36
    Width = 309
    Height = 19
    AlwaysShowBorder = True
    DataField = 'TYPE_ID'
    DataSource = crdTenant.dscIncomingDocs
    EditButtons = <>
    Flat = True
    KeyField = 'ID'
    ListField = 'DOCTYPENAME'
    ListSource = dscDocTypes
    TabOrder = 2
    Visible = True
    OnChange = DBLookupComboboxEh1Change
  end
  object DBEditEh1: TDBEditEh [9]
    Left = 128
    Top = 58
    Width = 309
    Height = 19
    AlwaysShowBorder = True
    DataField = 'INCOMING_DOC'
    DataSource = crdTenant.dscIncomingDocs
    EditButtons = <>
    Flat = True
    TabOrder = 3
    Visible = True
  end
  object DBDateTimeEditEh1: TDBDateTimeEditEh [10]
    Left = 128
    Top = 80
    Width = 83
    Height = 19
    AlwaysShowBorder = True
    DataField = 'BDATE'
    DataSource = crdTenant.dscIncomingDocs
    EditButtons = <>
    Flat = True
    Kind = dtkDateEh
    TabOrder = 4
    Visible = True
  end
  object DBDateTimeEditEh2: TDBDateTimeEditEh [11]
    Left = 251
    Top = 80
    Width = 83
    Height = 19
    AlwaysShowBorder = True
    DataField = 'EDATE'
    DataSource = crdTenant.dscIncomingDocs
    EditButtons = <>
    Flat = True
    Kind = dtkDateEh
    TabOrder = 5
    Visible = True
  end
  object DBEditEh2: TDBEditEh [12]
    Left = 128
    Top = 124
    Width = 309
    Height = 19
    AlwaysShowBorder = True
    DataField = 'DESCRIPT'
    DataSource = crdTenant.dscIncomingDocs
    EditButtons = <>
    Flat = True
    TabOrder = 6
    Visible = True
  end
  object DBEditEh3: TDBEditEh [13]
    Left = 128
    Top = 102
    Width = 59
    Height = 19
    AlwaysShowBorder = True
    DataField = 'MONTH_SUMMA'
    DataSource = crdTenant.dscIncomingDocs
    EditButtons = <>
    Flat = True
    TabOrder = 7
    Visible = True
  end
  inherited ActionList1: TActionList
    Left = 292
    Top = 92
    inherited aSave: TAction
      OnExecute = aSaveExecute
    end
    inherited aCancel: TAction
      OnExecute = aCancelExecute
    end
  end
  object dsDocTypes: TpFIBDataSet
    SelectSQL.Strings = (
      
        'select dir_val as id, name as doctypename from directory where c' +
        'lass='#39'Incoming'#39' order by 2')
    Transaction = crdTenant.trTenant
    Database = MAINDM.pMainDatabase
    Left = 292
    Top = 42
    oFetchAll = True
  end
  object dscDocTypes: TDataSource
    DataSet = dsDocTypes
    Left = 366
    Top = 42
  end
end
